Замечания
Объект DBEngine является объектом самого верхнего уровня
в модели объектов доступа к данным (DAO).
Объект DBEngine
содержит в себе и управляет всеми другими объектами в иерархии объектов доступа
к данным (DAO). Создание дополнительных объектов DBEngine
невозможно, а сам объект DBEngine не является компонентом ни одного
семейства.
Способ ссылок на источник данных ODBC непосредственно через
объекты доступа к данным (DAO) называют "рабочей областью
ODBCDirect". Это делается, чтобы отличать этот способ от непрямых ссылок
на источник данных ODBC через ядро базы данных Microsoft Jet с
использованием "рабочей области Microsoft Jet". В каждом из способов
доступа к источнику данных ODBC требуется один из двух возможных типов
объекта Workspace. Для того чтобы указать используемый по умолчанию тип
объекта Workspace, создаваемого в объекте DBEngine, следует
определить свойство DefaultType. Тип объекта Workspace и тип
соответствующего источника данных определяют доступные для использования объекты
доступа к данным, методы и свойства.
Для баз данных или подключений любого
типа данный объект позволяет:
1. Использовать свойство Version для
получения номера версии объектов доступа к данным (DAO).
2.
Использовать свойство LoginTimeout для получения или установки интервала
ожидания для подключения ODBC, а также использовать метод
RegisterDatabase для передачи сведений ODBC ядру базы данных
Microsoft Jet. Эти возможности используются одинаково, вне зависимости от
того, выполняется ли подключение к источнику данных ODBC через ядро
Microsoft Jet или в рабочей области ODBCDirect.
3. Использовать
свойство DefaultType, чтобы указать тип подключения, используемый по
умолчанию создаваемым объектом Workspace, т.е. либо рабочую область
Microsoft Jet, либо ODBCDirect.
4. Использовать свойства
DefaultPassword и DefaultUser, чтобы указать используемые по
умолчанию имя пользователя и пароль для объекта Workspace. 5.
Использовать метод CreateWorkspace для создания нового объекта
Workspace. При этом необязательные аргументы позволяют указать параметры,
имеющие приоритет над значениями свойств DefaultType,
DefaultPassword и DefaultUser. 6. С помощью метода
OpenDatabase открыть базу данных в стандартном объекте Workspace и
вызывать методы BeginTrans, Commit и Rollback для
управления транзакциями в стандартном объекте Workspace. 7. Использовать
семейство Workspaces для ссылок на конкретные объекты Workspace.
8. Использовать семейство Errors для получения сведений об ошибках
доступа к данным. Другие свойства и методы являются доступными только при
использовании объектов доступа к данным (DAO) совместно с ядром базы
данных Microsoft Jet. Они используются для управления ядром базы данных
Microsoft Jet, определении его свойств и выполнения операций над
временными объектами, не являющимися компонентами семейств. Например,
пользователь имеет возможность:
1. Использовать метод CreateDatabase
для создания нового объекта Database Microsoft Jet.
2. Использовать
метод Idle для предоставления ядру Microsoft Jet возможности
завершить незаконченные операции.
3. Использовать методы
CompactDatabase и RepairDatabase для обработки файлов баз
данных.
4. С помощью свойств IniPath и SystemDB указать
положение данных о Microsoft Jet в реестре Windows и положение
системной базы данных Microsoft Jet, соответственно. Метод
SetOption позволяют указать параметры, имеющие приоритет над параметрами
ядра Microsoft Jet, заданными в реестре Windows.
После
изменения значений свойств DefaultType и IniPath новые значения
свойств будут применяться только при создании новых объектов Workspace.
Свойства существующих объектов изменены не будут.
Полный список методов,
свойств и семейств, поддерживаемых объектом DBEngine, см в разделе Общие
сведения.
Для ссылки на семейство, принадлежащее объекту DBEngine, или
на его метод и свойство используется следующий синтаксис:
[DBEngine.][семейство | метод | свойство]
Пример
В данном примере выводится перечень семейств в объекте
DBEngine. Дополнительные примеры см. в разделах справки для свойств и
методов объекта DBEngine.
Sub DBEngineX() Dim wrkLoop As Workspace Dim prpLoop As Property With DBEngine Debug.Print "Свойства объекта DBEngine" ' Перечисление компонентов семейства Properties объекта ' DBEngine. Перехват свойств, значения которых ' являются недопустимыми в данном контексте. For Each prpLoop In .Properties On Error Resume Next Debug.Print " " & prpLoop.Name & " = " & prpLoop On Error GoTo 0 Next prpLoop Debug.Print "Семейство Workspaces объекта DBEngine" ' Перечисление компонентов семейства Workspaces ' объекта DBEngine. For Each wrkLoop In .Workspaces Debug.Print " " & wrkLoop.Name ' Перечисление компонентов семейства Properties каждого ' объекта Workspace. Перехват свойств, значения которых ' являются недопустимыми в данном контексте. For Each prpLoop In wrkLoop.Properties On Error Resume Next Debug.Print " " & prpLoop.Name & " = " & prpLoop On Error GoTo 0 Next prpLoop Next wrkLoop End With End Sub